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a at AND RPO3 DRIVES 
CONTROLLING THE PROGRAM 

4.1 PARAMETERS 
4.1. 

4.3 “ae 
iad ot, or 
43:5 °8 
4.3.4 "HW! 
4: $ *R? 
4:3. COMMAND INFORMATION 


- PERFORMANCE SUMMARY TYPEOUT 


ae 


- DATA CHECKING & ERROR RECOVERY 


e:3 ORI ON OF BA WRITTEN 
. ERROR MESSAGES 


7.1 ERROR DESCRIPTION LINES 
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i 8. PROGRAM DESCRIPTION 
fe Bod CEC EC TON Br OPERATIONAL VARIAGLES 
is 8.3 DATA PATTERNS 
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9. PROGRAM LISTING 
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WITHOUT IMPLIED SEEKS) AS WELL AS WRITE CHECK COMMANDS. 


ee a 
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REQUIREMENTS 


fl 
Hi 
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: 


EQUIPMENT 
REQUIRED 


POSER 


POP-11 PROCESSOR (WITH OR WITHOUT HARDWARE SWITCH REGISTER) 


KWii-L OR Kil 
HE Pt ete Re on 1 was 


OPTIONAL 
110-7 -ROOI TIONAL, POSS RPROZ" S OR RPO3’S ON THE SAME RPLIE 
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EXERCISER PROGRAM REQU F PACKS 
Bey gt MD A gi a 
(MAINDEC-11-DZRP2) "iW THE RPLIE 
MULTI-DRIVE EXERCISER (SE ON 4.4) 
2.3 PRELIMINARY PROGRAMS 


_——-RRUNBEEHIBSREY = BEHE Pinctiona tocre- aro ITE TEST 
| RUNDeG=L1-banes - ReLIE BRIvE FORPRTTER Progion 


3. OPERATING THE PROGRAM 


ao RIS IA oe se 
Hepes wit 


THE MAY BE I N AN *XXDP*® CHAIN IF THE PROCESSOR TO 
RUN CHAIN IS ik OR GREATER. 


3.2 TAY Be'GabnZD By SrhRTinG THE Procien AT LOCATION sovi@ne 


3.3 THE PROGRAM INR. BE RESTARTED FROM EITHER LOCATION 200(8) OR 
SBT Te COMMOLLER WRITE LOCKOUT AD ORIVE WRITE ENRGLE SUITCIES AS | 
CONTROLLED BY KEYBOARD COMPMHOS AND SHLTCH REGISTER SHITCH SETTINGS. 
F THE 
NITIA 


et SES WIS BP I Sos 
Fee in eee 


ON IS NOT REQUIRED. 
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3.5 
3.5.1 


3.6 


3.6.1 


PASS/TEST TERMINATION 
PASS TERMINATION 


RE SoHE STTST ERs TE Wy RARE HEE 
n. Eerie ie es ‘be See on on Ne on 


om TERMINATION 
THE TEST FOR A DRIVE IS TERMINATED (SW<O4> = 0) WHEN: 


A. PG Gee scrum oom 
C. A FATAL . 


ge es? oe che ake 


RUN TIME IN ’DATA TRANSFER MODE’ 
14 HOURS FOR 1 DRIVE. 
(ADD 4 HOURS FOR EACH ADDITIONAL DRIVE TESTED.) 


eM ble RR PBST DE AM TH 
| : 
12 HOURS FOR 1 DRIVE 
(ADD 3 HOURS FOR EACH ADDITIONAL DRIVE TESTED.) 


RUN TIME IN ’SEEK VERIFICATION MODE’ 
ASSUME THE sees PARAMETERS VALUES: 


. = 1 SECTOR (400(8) WORDS) 
*LT® 's Tai 


zs *FS’ 
SW<00> = 1 ¢ ONLY MODE) 
17 HOURS FOR 1 DRIVE 


I01 
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P (ADD 6 HOURS FOR EACH ADDITIONAL DRIVE TESTED.) 


1 





3.7 


4.1 
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UNIBUS & VECTOR ADDRESSES 


ING UNIBUS AND VECTOR ADDRESSES. (REFER 
THESE ADDRESSES 


THE PROGRAM ASSUMES THE FOLLOW 
TO SECTION 4.2.2 FOR THE LOCATIONS AT WHICH TO CHANGE 


UNIBUS VECTOR 
UNIT ADORESS ADDRESS 
RPLIE 17710 2s4 
TTY PRINTER 177564 NOT USED 
TTY KEYBOARD 177560 60 
KWL i-L 177546 100 
KW11-P 172542 104 


SUBSYSTEMS WITH BOTH RPO2-RPRO2 AND RPOS DRIVES 


SCS aE Ne, ie RL 


CONTROLLING THE PROGRAM 
cae 


EY DE COS STR a WET hl ASD ST 
ENTER PARAMETERS: 


THE PROGRAM WILL THEN IDENTIFY THE PARAMETER BY THE NAME GIVEN BELOW, 
Bro Wa 3 Pa sats ree hnosdbes: tad has 
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4.1.1 KEYBOARD ENTRY PARAMETERS 


DEFAULT we 
NANE = _ VALUE FUNCTION 
BUFRSZ ( ) MAXIMUM 
ete SIZE USED FOR DATA TRANSFERS 
PASCNT 1 1 - 1747 OF PASSES TO END OF 
INTRVL 5 0 - 377 : 


CMPLNT 4 0 = "BUFRSZ’ THE 
Fe “tee NOTED 
41 Fie # 





HOO aH d 
mmo 1 ons Pa 

I Beda 12 ree 
Ravio a 1M ie THE 


bpd hae REE RRR SA ce Sad cob salut ub aa lk EEE She ene : 
| | 8 


AUTOCK 1 OOR 1 IF EQ 1, PROGRAM 
PERFORM WRITE CHECKS AFTER 
EACH WRITE COMMAND. 
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IF EQ 0, THE PROGRAM 


: HILL PERFORM WRITE CHECKS 
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NOTE: f PROGRAM WILL SELECT A ee aren SIZE 


CO eno ibiay Ri eS a ae 


THE INITIAL VALUE OF ° 
MAXIMUM VALUES A cighony "FC’ AND "LC’ ARE 


Peive ves. BEING Teste: te (io) ED AT 


4.1.2 PERIPHERAL ADDRESSES AND OTHER LOCATIONS OF INTEREST 
TO ALTER THESE LOCATIONS, THE OPERATOR MUST MAKE MANUAL ENTRIES 


SBIRREGRO OSE IRR 





410 BEFORE THE PROGRAM IS STARTED. THE KEYBOARD ENTRY ROUTINE DOES 
ag NOT PROVIDE ACCESS TO THESE LOCATIONS. - 
aie LOC TAG CONTENTS FUNCTION 
41S z 
4 - ADDR 
is BS OBS ER RES at Eg 
41 155 Sk KS 177846 rive KWil-L STATUS REGISTER 
ust 1226: ever ‘. Kill CTOR eas 

1 1 74 ( MAL) IF SYSTEM IS 60 HZ; 

62 (SO DECIMAL) IF SYSTEM IS SO HZ. 


4.2 SWITCH sa SETTINGS 
IE THE DIAGNOSTIC IS RUN ON A CPU WITHOUT A 


CONTROL: 
S THE DYNAMIC LOADING OF THE SOFTWARE SWITCH 
SHED BY 


‘ REGISTER (LOC, 176).  FRON THE TY. THIS CAN BE ACCOMPLI 


1) ) TYPE CONTROL G <?G>; THIS WILL ALLOW THE TTY TO ENTER DATA INTO 
. 176 AT SELECTED POINTS WITHIN THE PROGRAM. 


2) De pce alt Ter, fle =XXXXXXNEW=S (XXXXXX IS THE OCTAL CONTENTS 


es 2) RETER. THE Neus" HAS BEEN TYPED THEN THE OPERATOR CAN DO ONE: 
ae OF fre FOLLOUIAG AT The 


° EG BERLE WRT 


’ 2 | os 


| GEERRSELAZ EGGS SISO 
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z IE Ae® detec RST KEY DEPRESSED THE SOFTWARE SWITCH 
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SOLS IANS SASSSN A SEEAEASSSSS ISSSSSEESEEEESOONS 





4.3 


dp 
<1) 
«10> 

(6) 
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8) oe Sor Tiee <*> 5S CEPRESSED THEN THE PROG MILL SED YOU 
+ 
z 
‘S> = 
‘») « 
SW<>> = 





RE ROD SOTO OGD ESLER, SSL 


KOSI MRS eA aOR REM ATES 


OF A 'T 


4.3.1 °T*® COMMAND 


USED TO ASSIGN A DRIVE(S) FOR TEST 
FORMAT: TN<CR> 


N * TRININIATED BY A CARRIIAGE RETURN cco MST 
CONE: TRCCR — ASSIGN ALL AVRILAGLE BRIVES FOR TEST 
es SE ere 


*D’ COMMAND 
USED TO DEASSIGN A DRIVE(S) BEING EXERCISED. 
FORMAT: ON<CR> 


ol ae!s, RPLIE MULTI-DRIVE EXERCISER PROGRAM 
1B. 


MACY11 27(732) Ol-NOV-76 


15:32 PRGE 17 


Ht N = DRIVE NUMBER. MAY BE 0 10 7 0R ’A’. ENTRY MUST BE 
CARRI é 


TERMINIATED BY 


>. 
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4.3.3 


4.3.4 





CXRPLE: Bo = Berasin RD Eelves BEING - 
NOTES: 1. Hogan RIL MPU DRIVE MOT PeeGeD 


@. THE ORIVES WILL BE DEASSIGNED AS THEIR OPERATION COMPLETE. 


2 I eS Ra RUT ES SE tr 


*S’ COMMAND 
Hetb. 12 REQUEST A PERFORMANCE SUMMARY TYPEOUT FOR THE REFERENCED 


FORMAT: SN<CR> 


N * GERAENIATED ey A Camdizhor RETURN ccf. MST 


EPLE: SIC - FOR DRIVE 0 
, CCR ok PLL DRIVES tei ? 


NOTES: 1. EE ofp ONLY DRIVES BEING TESTED WILL 
PRAT GE PeEs o 
PRPS 


DT) WRITE 8 para ax WITH DATA ACCEPTABLE TO THE RPO2 MULTI- 
FORMAT: WN<CR> wh 


ee 
DOPPLE: WB ~ BITE, Ta BAAS A RELL DIVES 


NOTES: 1. THE "W NOT BE USED "BUFRSZ’ 
; 1s TELY i TRACK INSEZE 6008 (10). 
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Be Pa DAAP Tae ORD). "HL 


ENTIALLY, BEGINNING AT "FC", * 


7 oe Be NE Oc 
STARTED IF SWITCH O (READ 


a oe Ak Oa 


"Wd" COMMAND WILL IGNORE THE SWITCH. 
STH OR ART RaURBLPERGY 8 MRE CHE comme 


4.3.5  °R’ COMMAND 
USED TO PERFORM A SEQUENTIAL READ OF THE PACK. 
FORMAT: RN<CRD 


n= DRIVE nme my TET aes ORY MST be 


EXAMPLE: RACCR> - READ THE PACKS ON ALL OF THE ONLINE ORIVES. 
RO<CR> - READ THE PACK ON DRIVE 0. 


REPRE AR CPST 
Ly a A ea 


sige “T°. 


4.3.6 GENERAL COMMAND INFORMATION 
a. al ean eee THE PROGRAM WILL TYPE OUT THE TIME 


. T PROGRAM Wd 
a Fue Ve homeo TS NOT VALID, THE ILL TYPE 


Cc. thy Be aod te Sey BEE ne — nen eae (WITH THE 


D. ‘THE ERROR RESPONSES FROM THE PROGRAM ARE AS FOLLOWS 
RESPONSE 
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PERFORMANCE SUMMARY TYPEOUT 


CONTAINS THE FOLLOWING FIELDS: 


fa ea ae EN Bue 
© Uber 


SOFT/HARD ERROR DEFINITIONS 

HARD ERRORS 

16 ReThy ATTERPTS FOLLGMED GY A Hone SEL WO A RE-SEEK To TE. 
ERROR CYLINDER AND 10 ADDITIONAL RETRY ATTEMPTS. 

SOFT ERRORS 


16 RETRY, WOME SEEK, RE-SEEK, 10 RETRY SEGIENCE CESERIGED ABOVE. 
DATA CHECKING & ERROR RECOVERY 


DATA COMPARISON 


DATA COMPARISON OCCURS AFTER EACH READ ORDER UNDER THE THE FOLLOWING 
CONDITIONS: 


A. THE ORDER TERMINATED WITH NO ERROR. 
. T TNA TH T Y 
8 STON TER rep ur A CATR ERROR GUT REND CONRECTL. 


VERIFICATION OF DATA WRITTEN 


SPURL Odie BES tn ol roo. 


via RPLIE MULTI-DRIVE EXERCISER PROGRAM MACY11 27(732) Ol-NOV-76 15:32 PAGE 


= 


Sa II SOT SE RSESE 


SVN 
es Bese Bt Pe He 
NOULE 


SSASIONRNSORE OO VOD 


, & 
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7. 


7.1 
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We ilu nthe nce i Fagus ue 


PROGRAN CONDITION HAS OCCURED OR A 





ERROR MESSAGES ARE MADE UP OF SEVERAL LINES. EACH TYPE, OF 
CH MAY ITH IT oF re 

POSeTELE chain ‘ties have OPPEAR hte Civen N Me 

SECTION IBING I CRROR HEADER. 

ERROR DESCRIPTION LINES 

(THE MESSAGE TAGS ARE GIVEN FOR REFERENCE.) 

MESSAGE 

TAG TEXT 

EMI RP11 DIDN’T RESPOND TO ADDRESSING 

WHEN THE PROGRAM AODRESSED THE RP11, A BUS TIMEOUT 


EM2 "INVALID RP11 COMMAND’ 


A i AN D RPI ; 
PATRAS IRE SAR 
EM3 "UNDEFINED INTERRUPT FROM THE RPI1’ 
PEG NREL BEERAE "ATI er 
EN1O «CAN'T MATCH DATA READ WITH A PATTERN’ os t* 
THe pata ION ROUTINE CANNOT IDENTIFY THE DATA - 


EMl2 "DATA COMPARSION ERROR’ 


PATTERN; HOMEVER, A COMPARSION ERROR OocuReD. 
EMIS °*ERR’ NOT SET BUT ’RPER’ CONTENTS NOT ZERO’ 


THE BIT IN ’RPCS’ WAS NOT SET BUT ONE OR MORE 
BITS WAS SET IN THE ERROR REGISTER. 


EMi16 "WORD COUNT NOT ZERO OR BUFFER ADDRESS WRONG 


at ye RPLIE MULTI-DRIVE EXERCISER PROGRAM MACY11 27(732) Ol-NOV-76 15:32 PAGE 2S 


re SUE ENE SA aE IN SHE 
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SSSR RS ie Sub iio SS RRP RRA RE ws Seana ha aura tase ed 


—s 
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"SOFTWARE TIMEOUT DURING POSITIONING’ 

A SEEK OR HOME SEEK COMMAND DID NOT COMPLETE WITHIN 1 SECOND. 
"SOFTWARE TIMEOUT DURING 170’ 

° GBTR J HGrER OR WRITE CHECK COMMAND DID NOT COMPLETE WITHIN 


"DRIVE OFFLINE’ 

THE INDICATED DRIVE HAS GONE OFFLINE. 
"DRIVE UNSAFE? 

THE INDICATED DRIVE HAS BECOME UNSAFE. 
"SEEK INCOMPLETE? 


Sie SAPIENS GRR ORS AMES GE BONED 


"UNIBUS TRANSFER ERROR’ 
COTES TONS ER Oh MEPERESTEN MEY GRR MNe 


A "MODE? ERROR OR A ’PROGRAM’ ERROR HAS OCCURED. 
"NON-EXISTENT DISK ADORESS’ 
NON-EXISTENT SECTOR, TRACK, OR CYLINDER ERROR HAS 


"DATA ERROR’ 


ERROR, "WORD PARITY ERROR", OR “LONGITUDINAL PARITY™ ERROR. 


"WRITE CHECK ERROR (NO DATA ERROR)’ 
A WRITE CHE iar. * . *HORD PARITY 
ERROR ST one TTUDIRAL BORITY® ERROR Bt TS WERE Not SET. 
"WRITE CHECK ERROR (DATA ERROR BITS SET)’ 


LONG! Sie Pani Ty ERROR ERROR ‘eiTs fe 9 eet, “OF? deommep sie 
"HEADER NOT FOUND’ 


FHA THE PME DISK bas ON The CORRECT C sone sat at 
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coesensee § 


bb pe 
NOUS LIU 


PT aiuk st BP ag Bee sn tela Miia in ina sia 


8.1 


EM3S § "FORMAT ERROR WHILE SEARCHING FOR INITIAL SECTOR’ 


SEARCHING FOR THE FIRST SECTOR OF THE DATA TO BE TRANSFERED. 


EM36 § °HEADER NOT FOUND, CYLINDER IN HEADER DOES NOT aati 


CES Purine. 


fi HOME SEEK TO THE DR 
THIS’ ERROR. . 


EM37 DIFFERENT ERROR DURING RETRY’ 
DURING ERROR RECOVERY OR RETRY A DIFFERENT ERROR TYPE OCCURED. 
EM43 ERR’ SET BUT NO ERROR BITS SET’ 
ERR’ IN "RPCS? WAS SET, BUT NO ERROR BITS IN ’RPER’ WERE 


"WRITE PROTECTION VIOLATION’ 
THE PROGRAM ATTEMPTED TO WRITE ON A WRITE PROTECTED DRIVE. 
EM4S § ’FORMAT ERROR DURING 1/0’ 


A *FORMAT ERROR’ WAS DETECTED WHILE THE CONTROLLER WAS 
SEARCHING FOR THE SECOND OR SUBSEQUENT SECTOR TO BE TRANSFERED. 


: 


PROGRAM OPERATION 


ero a Pcl rae ee 
ea Cents mae git THE-KuLlL OF KuL-P CLOCK IS, STARTED. 


COMPLETE” . COMMAND’ ENTRIES WILL NOW BE ACCEPTED 
THE Jl ag SCANS ITS INTERNAL ASSIGNMENT TABLES, LOOKING FOR: 


hee INITIATION: BUFFER ASSIGNEMENT, 


4) NG CURRENT OPERATIONS. 





ro a fe 
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SSP RS ee 
eet. cyrus =~ 


: os SE ere 





PS folnisemnd MALYING DRIVE, 
ere tyes 
EER OF WORDS Tuo REGISTERS 
ot neo ED ill * 
ORS HILL ORO PRECEDE LONG DER. ML 


A. ERRORS REPORTED FOR OPERATIONS WHICH HAVE NOT COMPLETED NORMALLY. 


nine BiniNe Set - EMI? 


8. ERRORS REPORTED FOR OPERATIONS WHICH COMPLETE NORMALLY. 


0 ore y= naa 


NG FOR INITIAL SECTOR - EN3S 


ek aa 
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C. ERRORS NOT FLAGGED BY THE HARDWARE ERROR DETECTION LOGIC. 
RP11 OION’T TO ING - EM 
Seat WITH PaHERN ~ EN1O 


a Me ae Et 


8.2 SELECTION OF OPERATION VARIABLES 


a. Peta ia Sa 


Hae non 


C. JHE DATA WRITTEN IS RANDOMLY SELECTED AMONG THE 20 (8) STANDARD 
+ PERFORMED OMY IF THe PREVIOUS OADER WHS A DRLTE COMRID. 


Be pte Oa 
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SOA 


PATTERN ‘8’ IS DEFINED AS THE "WORST CASE’ PATTERN. 6, 
PATS PAT 


8.3 DATA PATTERNS 
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9. PROGRAM LISTING 
4 
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cli sii ates 


ied hil ROEMER 


THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
;#PRCKAGE (MAINDEC-11-DZQAC-C1),MAR 24, 1976. 


SBTTL OPERATIONAL SWITCH SETTINGS 


11E MULTI-DRIVE EXERCISER PROGRAM 


BASIC DEFINITIONS 
OF THE STACK POINTER ##8 1100 #88 


{]ERSIC DeFINiTiOn OF Scope Gack 


weeeesese wseeeeress 
ee ee er we Se eo we eewe 


ar — 





isolate AE tions EXERCISER PROGRAM MACYII a Ol-NOV-76 15:32 PAGE 32 


x 
in Be Ue 
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peentoniyy LEVEL a: 
: i: 1 
ITCH REGISTER” curren DEFINITIONS 
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e*eeseeeee#e#ees resi ta'da'd NAW PUP 
7 EE eee 
<<<<<<<<<< 
A A 4 4 
° 6 + 
+_¢ . 
eewevwevsveesee @ y 


Gran G2 fee 


i! ‘ EF INITIONS (BITOO TO BIT1S) 


cay 





444s 
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= ee Oe Pe Po ee ne Dao Bae me bene an eae Pe Pas Ot Pam Dw am bs Pe ns fs Pw Pe at en bo ne nw ne Pens Pro eae Po Pa ao Paathens Prue fous fe free as Po 


[oa eal eat cad cadieel ond ead = 0 ame be ae Pe ae Pan an Pas Pw Peo Pan has Pant Bn b= be Pee me Pea ae fen Be am ws Po Pen ame me Ps Gaw H 
JSELHAREL CAS SOUR PO 5S SRA ESE SOBSRINE ICS 
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eC 


Gao fas Roo 
Pat pas fee 
No UI 











S 
“Eouly Biroe: 
i -EQUIV , 

“EuIV BITOe: i 

“EOulV BiTos; 

"Foul BIToN: 

“Eoulv irda; 

o Vv ® 

“Eoulv 6170/8170 

;HBRSIC “PUT TRAP VECTOR 

SEE fo DE 88 LEE Tacrioe 

BITVEC: hy 33 I 

PIVEGs 14 SHERERRPOINT TRAP (GPT) 

fotvets 34 $3 UIPUT TRAP (OT) #¥SCOPERS 
$3 Free (ENT) s#ERRORES 
TTY PRINTER weet 
+3 REQUEST VECTOR 





ae sDRIVE STATUS REGISTER 


eritets TE (NO IMPLIED SEEK OR HEAD SELECT) 
forseiais hors a 


;RP11 REGISTER EQUATES 


IMPLIED SEEK OR HEAD SELECT) 





fe SO ee uPAE a 


ate ree mittee PROGRAM MACY11 G3 Ol-NOV-76 15:32 PAGE 3 


17 
3RPOS (ORIVE STATUS REGISTER) 


1 
i jATTENTION BITS ARE REFERENCED BY BIT 


ata 


i 
i 
i 
| 
| 


wh Dae Be De ae fe Bee Bee Fs at P= Ome ns Be em Pe Pn Pn Bee me Pee Pe 
y. 


HOTBaeoT fee 
fae, eee VIGLATIO 
DD BY iy a oe ELSEWHERE . 


1 
NUMBER 


FIN TNTERRLPT ENABLE 


Sune SRE eR 
piers“ Dg beg Tame SaitGH REGISTER 


-SBTTL ACTI1 HOOKS 











wie MULTI-DRIVE EXERCISER PROGRAM 
ACTL1 HOOKS 
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33 SELREREDLRELE LEEKS 
e 
sHOOKS REQUIRED BY ACTI1 
: $SVPC=, ;SAVE PC 
serSeo 3;1)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP 
;WORD._ 40000 332) 0¢.S2 TO 40000 
;=SSVPC 33 RESTOnS pe 
.SBTTL STARTING ADORESSES 
-2200 
ART ;START PROGRAM WITHOUT CHANGING PARAMETERS 
te TART START PROGRAM AND CHANGE PARAMETERS 


JO3 
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RPIIE MULTI-DRIVE EXERCISER PROGRAN 


* “COMMON TAGS 


ND-11-D2ZRP1-8 
OZRP18. CNB 








ee pooe {noLcaToR 


AUT 
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PECCLEELEL ery 











Soon Bo8ouz, wo 
wlufota 68ouz% os 
ye ee, ed eed od ed eg ed ed ee ee eo ay a 


Pafatatalatatavetaletatatateteteraretatatetetareterorctatetere) sfatatatatetatareya) 
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Erte) i) CUITUTOTUlOT IT TUOTUTUre 
1 Ad,. Sob ~~ ¢ 
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RPPRIO: .WORD a i OF KLE 







eS (a) IF SO HZ SYSTEM 


Les sa 
INT FOR & R WAIT 


; Stone eee 


= 35 
-- 
S oak 
ee esce ee ee ‘se 
eeeee 





Gace 














ite 5% 
55 
.SBTTL CONTROL PARAMETERS 
5p SHEE Hi ataiadadal 
ENOCON: . Zip $6. 25X10t@ WORDS (10) (1X10110 BITS) | 
ENDSEK: . 941100 31 X 10t6 SEEKS (LSH) 2 
PASCNT: WORD i ; TEST \ 
oe ; "9A BY OPERATOR 
' 

TNR: “Wow 8 } "TyPeout INTERVAL 
CMPLNT: .WORD 4 OF TYPED OUT 

Tio: :WoRD 8 ys bape! evens 





AUTOCK: .WORD 1 if EB wo pani Eck ORDERS RANOOHL Y 


MAE AE AE aE AE A AE A A A a a a aa Ha EE 
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OZRP18. CHB RPLIE ADDRESS LIMIT VALUES 





-SBTTL RPIIE ADDRESS LIMIT VALUES 
pe 


Le: «WORD O 


JHE 
RANGE 0 - 312 OR 625 (OCTAL)) 


Renna 
te ius es fs foeric 
:: a ik oe a é ot te Oe Shan 


3) SHHINHINHNHHHNHIHHHIHHIHHEEHE Ht 
-SBTTL VALUES FOR FIRST OPERATION 

T ttines tan tapas 
BEGPAT: i] (RANGE 1 - 17 (OCTAL)) 
a oe A Bae hy Mia SEEK 


ere 
BEGSIZ: .WORD 400 ae Ss? 
: ie tt ti te THAN phe Me 
ea 














a 


be he 


BESIRAPAR ASSEN EROS 


~ 


. 
Be ee pene Bt Be fe eee ee bP tt es fe ee ee fe Fm Pe hb eB fee b= om ee Be eh Pn ee eo fee Re er ae i 


ee EN yuan etter] 
Re NOU LU) 


MO3 
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a 


-SBTTL ERROR POINTER TABLE 


at : re a Meer earch nt DATA ie igh PERTINENT. 


; #NOTE2 IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 


: of gay roe 





% 
3% DF NTS TO THE DATA FORMAT 
001346 SERRTB: 
a ;ERROR 1 
i ;RP11 DIDN’T RESPOND TO ADDRESSING 
Tl 
OF 1 
;ERROR 2 


; INVALID RP11 COMMAND 


= 
asa SaR3 





; ERROR 
mt ;UNDEFINED INTERRUPT FROM RP11 
001 
001 
sERROR 4 
‘A ‘e ; UNUSED 
D1 
001 
001 
sERROR S 
cathe 
mat 
001414 








MD-11-DZRP1-8, RPLIE MULTI-DRIVE EXERCISER PROGRAM  MACYI1 27(732) OI-NOV-76 15:32 PAGE 40 
OZRPI8.CNB =’ ERROR POINTER TABLE 7 





1439 001424 000000 0 

1440 

14g pte: 

44y 

lad 

laa 

1448 sERROR 10 

te EM10 ;CAN’T MATCH DATA READ WITH A PATTTERN 
1451 pHLO P 
BB | 

i ;ERROR 11 : 

fate one 0 ;SECOND LINE OF °CAN’T MATCH DATA’ MESSAGE 
i Bis By 

146 

Rs sERROR 12 : 

1 001 12: ;DATA COMPARE ERRORS 

ies 00 1466 Bid 

1 001 OT10 

int 001464 DF le 

ies ;ERROR 13 

1471 oot ;DATA COMPARE DETAIL LINE 

ie fai 1 

iw 001474 Bria 

17g sERROR 14 

1478 0014 0 ;DATA COMPARE ERROR SUMMARY LINE 

1479 001 14 

1 001 T1i4 

i 001 14 

' sERROR 15 

i ot ° i ;"ERR’ NOT SET BUT 'RPER’ CONTENTS NOT ZERO 
1 00151 Tl 

i 001514 l 

i ;ERROR 16 

13s Boiseb ait ;WORD COUNT NOT ZERO OR BUFFER ADDRESS WRONG 
14H 1Se2 Tlé 





Dae t.ce 





tyttatt tt 





ee 


RA ALA ATA 
' A 





6, RT eee PROGRAM 


Kr ae et 


OF 16 
sERROR 17 


et 
17 
T17 
17 
sERROR 20 


1 
T17 
17 
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;SOFTWARE TIMEOUT DURING POSITIONING 


;SOFTWARE TIMEOUT DURING 1/0 


;ORIVE OFFLINE 


;ORIVE UNSAFE 


;SEEK INCOMPLETE 


;UNIGUS TRANSFER ERROR 


;NON-EXISTENT DISK ADDRESS 
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001624 


: 
f 


Mol 
" cogo 5 scan 


hog p 


;WRITE CHECK ERROR (NO DATA ERROR) 


;WRITE CHECK ERROR (DATA ERROR BITS SET) 


;HEADER NOT FOUND 


ty 
F 


;FORMAT ERROR WHILE SEARCHING FOR INITIAL SECTOR 


= Tr F 
DOES ROT , CYLINDER IN HEADER 


3x3 
> H ‘ 
+4 
x.' 
z ie 
= 
+e 
3s 
% 
EN36 
DH34 





ate Sa ue line ier PROGRAM MACY11 nbOt Ol-NOV-76 15:32 PAGE 43 
Des 


sERROR 37 


;DIFFERENT ERROR DURING RETRY 


;ERROR SIGNALED BUT NO ERROR BITS SET 


;WRITE PROTECT VIOLATI 


2 


;FORMAT ERROR DURING 1/0 


AND INITIALIZATION ROUTINE 





wwe BF 
rs 
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} STRAT ADORESS WITH PARAMETER CHANGES = 204 
we 








an i ee ae ag 
aa vey | NSS == 
IAPR RE Fol room 








3; INITIALIZE aris 2. 





nite 3;POINT TO SOFTWARE SUR 
(SP)+ eet eas VECTOR 


_ =} t += ! ef al TF ONS "at and Sonal hag tata. 
* 4 ’ 

\ hy AQeQan) Shi Viatyal a CUNT Mfc 

a 4 =t=*+ ¢ m ey 

ed \ 4 - Ty oe \ 


& She 
e 
? + J 
#5? yf 14.9 
mya\4\4 
eh igh + 


001140 000176 









YG bas mn 
7 00001 OOH $75: ROVE 1, SAUTOR 5 ;SET AUTO-MODE INDICATOR 


Tests? Oolie? Gite STPruc SET Try avaluseicaty FLAG 


ono 
~ 


FSRASTOUPTONODIONOOIENN OS 


(=> On bm Ome ae On Om Pen =n =e Pee Os Oe =n Pe =e Has Hans Hae Hun Pw Oo ews fess as Gw Ga =o He Ha Oe Pees On as Su md => mn Sean ew Pe uw Pen aw Huw Pus fae Pe fae pw Gus wpe pee 9 


VAIAISS eR TeR Sa MMSE ASA 
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VALUE FOR SOFTWARE SWITCH REGISTER 
ae OF AREA TO CLEAR 
L AREA 





a3823 
“tz 8 





;ROUTINE TO DETERMINE BUFFER AREA SIZE 







Thee : SEC MAXIMUM 


IF 

MEX VAIL NENORY AS MAX BUFFER SIZE 
9 

IF NOT 3 


), 


MOV RY), RS 
MOV (RS), -(SP) 


Praee es Rr 


SHE UA EEN Rin 


1775 104402 

1 tere 

t ee 

1 et 

{ Jott 

RS, ; 

i 2 65< es: 

oot > 78: 

Be Be exe 

ENTPRe: 

3 CHECK 

Wc CKROR: 

1 e7 ee 

Mie? Je 18: 

ie : 

1805 ae ? es: 
3S: 
4S: 
S$: 
6S: 





SEU ANI | a ea 
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PARAMETERS FOR VALIDITY 


ROUTINE 






°S 
LIMIT FOR RPOS’S 
IN "LC’ ? 


al Sper QS STARTING 
SP); 


OF PARAMETER NAME 





ate Slad RP 


we Foe Sirfieve Sidon febisven MACY11 iN 


BROPAR 
»FC 


4 
@ 
~ 


stant 
ge 
@ 


PLE EELS 
= 


ai. 


tan 


I 
IP 

I 
mov 
JP . 
THE 


~~ 


3 
e 
~ 
og 
cs 


Q 
& 
3 


E $5338 
se 


rE 
g FR 


IRE fa 2A ENBE 


Ol-NOV-76 15:32 PAGE 47 
yp eli nn enece 


TOO LARGE ? 
NAME 
LARGER THAN MIN TRACK 


ENTRY ROUTINE AGAIN 


SET UP THE OTHER UNITS THE 


aE Si Malin 
iin ree kee 








a7 032801 o0sse 1 
1 : SNOTSAF 6S ; 

i : eas ars cE sieBtt he) oevr 
37 032510 oo34Se SRPO3, 7S ; 

B 


8 
P| 
SSSuSU PARES ie eESSEN 
att 


% 


BO VS GSS GO SO SVS SF SF SE SF SESE SE SF SE SE ws @we 
‘* 
> 


1 PSW 
;SET UP IF *XXDP’ OR ’ACT1I’ OPERATION 
ooocv2 MONTR: 3°XXDP* CHAIN MODE OR "ACTI1’ AUTO ACCEPT 
00010 eee 3 da H Re tet 
000041 41 ;SEE WHICH = *XXDP’ OR "ACTIL" ? 
000007 000041 Ss #741 be A head THE LOADING DEVICE * 
tes 1S pe Pe ACN sren ° Reet Res carr on 
OO4ONG 2s: IP MIN Patt 
;’XXDP’ OR "ACTIi’ END OF TEST ROUTINE 
000042 SGETY2: ; »RO spon 
Soon 18: ESzTOF0, RO iT hfe 
177777 00002 §1,8(RO) : te 1S LasT Pass 
eT THE MOMLTOR 





® 
9 

SENDAD: J PC, (RO) Pali 
é 

SDOAGN: : 


002016 SMP START 


wv 


JOY 
ISER PROGRAM ACYL 27(732) OL-NOV-76 15:32 PAGE 49 


SWITCH REGISTER 


pri wie MULTI-DRI 


VALUE FOR 











rae RATE STATISTICS ? 
MAT ioe F NO 
I ,OSeR ; pee 6 
cra N ; 
» STATPR 3 THE STA I 
;LO0K FOR DRIVES TO BE DEASSIGNED 
MAINO: 
18: 
2s: 


Big 
aR 
ot 
am 
Fr 





;LOOK FOR DRIVES TO BE ASSIGNED 


roy 
BNE 
y ev IGN QUEUE: 
is a Ah ee a 
a: Roy eaVAIL, RL ; UNITS TABLE 
. BEQ 5$ I fe TBO oF "WAIT? TABLE 
1), (RS) La? el THE ONE TO BE DROPPED 
»Ri (ea "AVAIL’ TABLE ADDRESS | 
SWAIT,R : WAIT TABLE 
Fe (Ri) . ae oe ek . 
2s ;BR * REQUESTS 
(R1), (RS) a WA 5 
MM. « fae Tiga reat 
ATT’ TABLE 
7S: MOV (R1), RO ; SR ot hel BLOCK N RO 
Re Ne + THE TIME 
te (RO), -(SP) be IVE NUMBER 
eat . TYPE IT 
aR 


i Riearur..... 


y Roe Ws 


KO4 
1-8, “it MULTI-DRIVE EXERCISER PROGRAN MACYL1 27(732) Ol-NOV-76 15:32 PAGE SO 
MAIN PROGRAM 





000010 MAINI: 





RY, -(SP) 
re 

Re : AVAILABLE TABLE I 
NEMUNT wan Ra ifs 


> 
ome 
“4 
SUR 
Reet hee ee 


8 
f] 
a 
a 
BR ee 
a 
cats 
Baas 
oo 





NS 
ped 
a wee 
x oN me we ce 
= 
~ bez25 
ee eve 


SBSSIERES IESE GeO fa 8 fag ARAL OS 
: 


a co a 5 SOELERENT 


"AVA pee T POINTER 
MORE UNI a 


MAIN2: TST WATT wai REQUESTS 
r AVAIL (R2) ny Fe ant ITING FOR P PARENETERS 
oP ane F ie hit RY BEEN IN THE CLELE ? 
f (RO Fight coven ven we ow 
pen: ; aren 
? 
fee Pr gerPoe —— 


™> - = . 
x 


pine pits ie 3 LO4 
MO-11-DZRP1-B, RPLIE MULTI-DRIVE EXERCISER PROGRAM | MACYLL 27(732) O1-NOV-76 15:32 PACE SI 
OZRP1B.CHB —' MAIN PROGRAM mene, : 


a Meron Rive BUFFER R10 DPB 

s PAR pele ies om 
ee eT a ee 
a) ee a 
“= BAL 
ie a eva AY? frou suey FROM AVAILABLE TO WAIT 

R fie ERM eee me 

;GET BUFFER ASSIGNMENTS FOR pnIves IN THE *BUFFER WAIT’ QUEUE 
MAINS 


Ey HE RS te ARE Pe euren son 
(SP, SBUF (RO) tots TO THE PB 
i ;8R IF A Was ASST 
V Ges DRIVER 
RS hex N RS 
ie ‘5 NOT fener ee 
ra Meee one 
mathe "> SLSKCFot roe" Ehnles-= 


;WAIT FOR AN ORDER TO FINISH 


Ri 
(Ri)+, 


BySsRase use aee 
RBs 


OF THE QUELE IN Ri 


iPUT BOCK NTO RO 


T FOR UNIT IN RO 


Buugesmunes 
BaRERO 
2 4 
eee 3 


H 
* RE’ 
PC) ABNRML sSEE IF ANY UNITS HAVE TOO MANY ERRORS 
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Yo. BX MEMES 
BPP AES oe 


Thuy, (9S) INTO THE T 
- wv owe 


;ROUTINE TO UPDATE THE GENERAL STATISTICS FOR THE DRIVE IN RO 


004716 STATIS: SRPBA(RO).FACTOR ;STORE THE F $s 
004716 (RO) FACTOR ; TR T The INTE 2 , 
TOR : TO A WORD 
#B1TO2, SCOMND(ROS sREAD OR WRITE ? 
sBR IF WRITE 
TOR, $ AO(RO) UPDATE THE READ WORD COUNT 
$c ), (RO) ;DID MID-TRANSFER SEEK OCCUR 


ae 


FACTOR: .WORD 0 ;USED FOR WORDS TRANSFERED , 
37 JUHI HHHHHHHIHIHIHIHHHIHHHHIHHIHHIHHIHEHHHHHEHHHEHHEHEHHE 


-SBTTL BUFFER SUPPORT ROUTINES 
3 | HHINHIHHIHHEHHHIHIIHHHEHEEHHEHEHHHHHEHHHHHHHHHHHHBHEHBEHHEHE y 


sROUTINE TO GET A BUFFER 
GETBUF: MOV RI, -( SP) SSAVE R 
MOV ont ; Hy 
) § 


ae 
a 


T 
»(R1) ;MAKE NEW STARTING ADDRESS 


+ 
EEE OEE 
3 





ga 


pear 


| 1S: 


aS 
SBERGBER® 


a 
P] 
= 


eg ee 
a 
ms a 
: 
oe 
= 
5 
F 


cd 
Ce ae aed eel 


Sareea 
ae 
aa a5 2a 


Beet te 


titer 


Porvrorororurororurorororoforuroruroronororurorororururorurururururorurorururorururvorururorurororururururorurory 
ae me ae me fe Oo ae Be ae a a me ae ae ae ae ae ee me ae a eh ae ae be ee me an ee a an fn em Be ae en Be he fe eh Pe PP 





MD-11-DZRP1-B, RPI1E MULTI-DRIVE EXERCISER PROGRAM 
DZRP18 _ BUFFER SUPPORT ROUTINES 
7 
8 4S; 
6S: 


RELBUF : 


rururorururururorurururorurururururururufrururururururururoruru 
=e he Pe ae ewe ae Fame an Be Fae fame Bam me fe Pe Pe Pe fe De Gow fee Fw P= Owe Fw Os bo HP He 
SRRL6 62 SSSSRRISRLS IAIN aZII~ 


Te 


4 
025614 3S: 





BRaRNNNSS 


NO 
MACYLL 27(732) 


220 
38 


ee ee 
++ 
sos. 

Co hy 
az 
pores 
eet ee 
Sad 


SReSseeeneN a 
Cara: 


¢ ee" 
ed ~ FRO cho), Fa 
i SEUF (RO) ,R3 
Soo aR 
eae 

ia SRL CRO) CTRL) 
od (RO), (RL)+ 
Roy FRas thi se 
2 
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; ®@ BYTES TO WORDS 
t 

; ES 

; TI TALE EMPTY 
A COUNT 

:BR Ir ITEM LAST ENTRY 


Rp et oie 


icon TMI IF ROT AT CHO OF TABLE 
: 


;ROUTINE TO PUT BUFFER BACK IN TABLE 


; SAVE 


— 
stm 
comnTNe FER BLOCK INTO THE TABLE” 


;BLOCK S 


FOR USE LA - 
Ieee a LATER, IS IN THE TABLE 


TO TABLE 


ml 
" 
zea 


B 


RT vas 


AID 


a i 2 A PROGRAM MACY11 nag? Ol-NOV-76 15:32 PAGE SH 











we ee 
wR 
a 
a 


Ras 
a ee 
++ 
2. 
he) 
bb «] 
eo pee 
i all 
++ 


TRS BSR eS Rane a ten eS SeeeS ay 
agen gs 
+ aE ie 
a 


;FILL THE ASSIGNED BUFFER (IF WRITE OR WRITE CHECK ORDER) 


FILBUF : G 79 O-R- 
1) sGITO2, SCOMMOCRO) sf AD_OR WRITE ORDER ? 
SARTCHK, SCOMMD CRO)» sHRIT TErecx * 
033644 1S: (no), sEnoren etna" E BUFFER IS ABOVE PROGRAM 
Se if FEER DORESS WITHIN PROGRAM, ILLEGAL 
\, BUFRS2, SHROL(RO)’ SEE TF WORD LENGTH DOESNT EXCEED MAXIMUM 
q a 


1g ; 
HAL ; 
ES -2 ; 
my role | Rr 
(RO),RY RELATIVE PATTERN ADORESS 
2s: cReite RL+ =; OVE THE BUFFER 
a : 
HOY 


yy A Sa PROGRAM MACY11 nde Ol-NOV-76 15:32 PAGE SS 


we ee BO TGR ve rrom 


;START THE ORDER FOR THE DPB IN RO 
GODRIV: MOV at ae 


1S: oe 


(SP)4 
é 


2s: 
$3 
-SBTTL GENERATE VARIABLES FOR THE NEXT OPERATION 
33 
5 


9 
GENERATE VARIABLES FOR THE OPERATION 


——- 


RS 
(RS), SCOMMD(RO) TON COEE TO CONTROL BLOCK 





Hat a PORE ee TL DE DERI eeR to arenas nos Ol-NOV-76 15:32 PAGE S6 


;GENERATE A RANDOM SECTOR ADDRESS BETWEEN VALUES "FS’ & 'LS’ 
GETSEC: MOV 


Tururocuruy 


4 44 44 
ous 


;GENERATE A RANDOM TRACK ADDRESS BETWEEN VALUES °FT’ & ’LT’ 


Bre | iStormmct ni 
Een 


CYLINOER GETWEEN VALUES "FC’ & "LC’ 


bat bythe thet nt by 
AtAtAtata 


BUFFER LENGTH BETWEEN 4 & THE VALUE IN *BUFRSZ’ 


Pes, 


‘at rout IMPLIED SEEK ? 
THE STACK 





Seay WEN MEPS Poon = 











« 


(RO), (SP) 
S755 (SP) 

~» (OP) 
810, SCOMND(RD) 


(RO), SHROMCAD) 
(ho)” 3 
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REE» m0 


* IMPLIED SEEK’ COMMAND 
IMPLIED SEEK ? 







;GET THE PATTERN CODE & EXIT FROM PARAMETER SELECTION 


wn ETT ase 


IB, BF GES os 10 oc suscre 


WRITE CHECK ORDERS 


SELECTED ? 
BR 


000064 
ROUTINE TO SELECT A WRITE (OR WRITE CHECK) OPERATION 
RENHRT: a3, 
aie | 
1 
/R5 
18: ,a ; 
oo0024 1702, SPREVO(RO} 
t 
ooo0d2 2S: 


sROUTINE TO SELECT A PATTERN 


GETPAT: Og en 


18: 
PC 


ips Prey OUS ORDER A WRITE ? 
fe Pe 


sSELECT PATTERN 
; SELECTED ? 
NUMBER GENERATOR 
MAKE INTO TABLE INDEX 
RETURN 


;ROUTINE TO SETUP PARAMETERS FOR A SEQUENTIAL READ OR WRITE OF THE DISK 


mmm: TET SifEnceccroy §=— SEE fr First Oreantion 
7 


M-11 PROGRAM MACY11 27(732) Oi-NOV-76 15:32 PAGE SB 
OZRP1B. NEXT OPERATION = ~ me 
) oF COUNTER NOT ZERO 


: 
he 
: 
E | 
: 


;DECREMENT AND SAVE CURRENT SECTOR & TRACK ADDRESS 


<i EB 


5 
-SBTTL GENERAL SUPPORT SUBROUTINES 
$5 





cael. REE et rE Derr MACYLI nia? Ol-NOV-76 15:32 PAGE 59 


aoe one "CONTROL C’ ENTERED DURING NORMAL OPERATION 


Oe «| Sesvede =| itu ro re ehrky Rovtsre 


;ROUTINE TO COMPRESS THE TABLE WHOSE ADDRESS IS IN Ri 
: (Ri), (RI) 3 T R 
Ee Fert, ens : ee Rt 


18: 


sROUTINE TO CHECK FOR ap OR wui-P CLOCKS 


CKCLK: MOV AVAILABILITY FLAG 
; HOV ORK . & VECTOR FOR CLOCK CHECK 
F 


aa 
POOR lar a 
1 VECTOR 10 CHECK FOR KWLi-L 
. "a ee 


; i =k INTERRUPT 


FETISHES NTE 


th thee 


++ 


44 


te eat tals 


\ 


- 
- 
_ 
— 
> 
= 
- 
> 
- 
— 
- 
a 
- 
> 
_ 
a 
- 
a 
- 
> 
- 
— 
- 


aah 
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;ROUTINE TO DISPLAY STATISTICS FOR ALL ORIVES ASSIGNED 


STATPR: G Ry 
2, uo. 


O2eS460 18: ITB 
TLO+2, RO 


BIS oesno : atRBIT CR), 
ILO+2, 


Sk 


Re 
270 


- 
«° 
—'s 
—_ 
ae 
> 
> 
ae 
>. 
~~ > 
> 
<> 
-> 
a: 
—_  - 
_- 
~ 
_ - 
-> 
> 
- 


ee 


tt, 


aftagte 


‘ shoe} 
BSeLRBS 


TYPE THE ORIVE PERFORMANCE DATA LINE 
RY, -(SP) 


; 

(RO),-(SP)’ ; PASS COUNT ON THE STACK 
sCONVERT IT 
* TYPE tt 
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B23 


SRI2T, 
8 


— 


= § 


ac8 


: 
: 
FOV 
Rov 
4 


3 


SSOFT WILL NOT GE INCREMENTED BEYOND 9999 (10) 


= fe Uberao” fdbdi ter AT MAXIMUM ? 


;ROUTINE TO INCREMENT SHARD 
;NOTE: SHARD WILL NOT BE INCREMENTED BEYOND 9999 (10) 


= fe Ero dedi pay AT MAXIMUM ? 


;ROUTINE TO INCREMENT S$SKT 
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OZRPIB.CMB | GENERAL SUPPORT SUBROUTINES 


NOTE: SSKI WILL NOT BE INCREMENTED BEYOND 9999 (10) 


ahs is rails lbs aa AT MAXIMUM ? 


sROUTINE TO INCREMENT SMISPO 
NOTE: SMISPO WILL NOT BE INCREMENTED BEYOND 9999 (10) 
INCMIS: CHP SMISPO(RO) , 89999 18 wurse0 ALREADY AT MAXIMUM ? 


1S: ie grispocno> ip NT SursPo 


sROUTINE TO INCREMENT STOTAL 
;NOTE: STOTAL WILL NOT BE INCREMENTED BEYOND 9999 (10) 
INCTOT: CMP  STOTAL(RO),#9999.__; IS STOTAL ALREADY AT MAXIMUM ? 
«EE flomaaos {dedi rome 


sROUTINE TO TYPE THE TIME 


1240 010144 


010141 
010141 
010140 
010140 


a ll 
ue nares 


$0, MINUTE+1 


010135 
010135 


Ak Sona 
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COR ee Oe Ean SuPPORT INES 
SINCREMENT UPPER HALF 

iA aX 


HIRCRSIENT HOURS 


if ae is 
: NOT 

iT UPPER 
ibe Rate 


ar tor PERFORMANCE SUMMARY ? 
; I NTERVAL FINISHED ? 


Oxo Go fee Pe fem ee Hue 
NOU £UITU 


t= pe 
BE ReRReS 
EAS Re 


Peet Baws Preme fet Ba Pe Bes Bede Pw po hee Be 
=$i:2f= 
Ain 
PEK 


$ tf TA DISPLAY FLAG 
sRESTORE RO 


HF a 
2's? INATOR 
3 SECONDS 

:SPACE, TERMINATOR 


g gabbees SQguquaeenygageagegy 


:1/60TH OR 1/SOTH OF A SECOND COUNTER 


;SAVE_RO-RS 

te TURN AT PRI ITy 4 

} TER FROM THE KEYBOARD 
q ? 


Wier euse 
; THE ADORESS 
ee PERSIE SF Etre 
i 


tEQ TO AN ’A’ 
tBR IF 17 1S 


args OE 


1: 
¢ 1 010146 000060 


a ti 


He 

e7e 

5784 

ra 

DECODE 
KSA: SAVREG 

ae 

a 

i. 


Gm Dee hee BO Bae fae ae Bae ame pao Dent Beat nd fant Seat pas It bo Ds fe 
=== 
TT ,¥t,? 


SPEPCe irc heh res 


4 
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GENERAL SUP*ORT SUBROUT 


(RS), #60 sUNTT R LESS THAN AN ASCII O ? 
8107, (RS) : Y LOWER 3 BITS IF CHAR NOT "A? 
YY re itReD : *T? 


Rec bes fae peo he he 







a 
P NEWASN Blatt ONIT FOR TEST 
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025526 
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+ Pate HATTE pat T 
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sROUTINE TO DERSSIGN A UNIT ('D’ COMMAND) 
DERSON: fe #01, (RS) IGN ALL UNITS ? 
Pov 81,83 ear UNIT 
te%3,, RUMBER 
1S: E araatT (RY), asnst ; UNI 1 ASSIGNED ? 
A BTABIT(RY), asnust UNIT FROM THE ASSIGNED LIST 
BLKAOR(RY), ,DuNI TERY) mR Tito Bako TNE LIST 
23; Bee if sANY nT UNITS ? 
BEG 48 :BR IF NOT 
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Gene BY eee os 
4g: ie AGE ; " 
SS: HOV #8. RS SET UNIT COUNT TO 8 
sROUTINE TO TYPE UNIT PERFORMANCE SUMMARY ('S’ COMMAND) 
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tips pe , (RS) ie Peers * ? 
BYE ATRB at ery TCR) ,ASNLS? ;SEE IF UNIT ASSIGNED 
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1S BR IF NOT 
; IT BOR INTO WORD INDEX 
, TYPEST DRIVE STATISTICS 
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3° 004737 007126 us: BC, STATPR TYPE ALL STATISTICS 
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B90 sROUTINE TO WRITE A DATA PACK (°W’ COMMAND) 
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11106 012737 001252 REDAPK: MOV #1,PACK <« SET THE *READ’ INDICATOR 
ae 000137 sittin IMP aeano ASSIGN THE REQUESTED UNIT 
;TYPEOUT ASSIGN/DEASSIGN ERROR MESSAGE . “ 
10 011120 104401 44 ASNERR sQUESTION MARK 
1 Ht } paeeie TPE : ie ON 
ee He ee 
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ie ttt asnnsc: ‘WORD 0 i Mesence AooRese 
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CLROPB: 
i MOV —s-_ R33, = (SP) ; R3 TACK 
i HOV «RM -( SP) + POSH Ra On STACK 
1 Ov RS, -(SP) :s RS ON STACK 
ee i ah ee : F TO BE CLEARED 
1 MOV R3 ye L TO BE CLEARED 
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ILO-SREG,R3 ; TO BE ¢ 
r 2s: CLR sei -} CLEAR 
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;DEASSIGN A ORIVE IF A FATAL ERROR OCCURS 
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ta P) ieren Bivipent THE STACK 
i spuUST THe SHACK POINTER 
;ROUTINE TO REPLACE LEADING ZEROS IN A NUMERIC STRING WITH SPACES 
OL1742 SAPZRB: tw ; TYPE _@ SIGNIFICANT DIGITS 
01172 SRPZRY: Kav FCETUP T 4 SIGNIFICANT DIGITS 
011742 SRPZRS: 7 i mu 3 SIGNIFICANT DIGITS 
SPTRO: fea beet t 10 SIGNIFICANT DIGITS 
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a coe 
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oe) sTUTS ROUTING 1 USED TO CHECK IF AN ASCIT CHARACTER IS A DIGIT 
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3 “Rp: a 
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;CHECK BUS ADDRESS REGISTER & WORD COUNT REGISTER 
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TH pene 


oa DION’ T COMPARE 


;LAST LINE OF COMPARE ERROR REPORTING 
ENDCHP: TST ERCTR 


r 
RTS 
prin iefonn #2 PR BF 
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OF PATTERN IN RY 
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em 
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af 
— — ee 
& 


013460 000207 RTS = PC ;RETURN 
;ORDER TERMINATED WITH AN ERROR - PROCESS THE ERROR 
afte ERPROC: By eee , STATUS(RO) I Le Blokes * 
137 013662 IMP ERROR WITH 1 DONE re! BIT set a: 
PROCESS ORDER COMPLETION WITH Sate & "DONE NOT’ BITS 
ERPRC1: BIT 81708, , STATUS(RO) agi BS x, RESET’ ISSUED ? 
TD, aSTKS TTY INTERRUPT 
re ek STATUS(ROS ;UNIT OFFLINE ? 
$2 3, STATUS(RO! _ CODE USED ? 
s81Tle, STATUSCRO) 
sraTuscrol”s af! ris ING POSITIONING ? 
oh DURING 1/0 


ihe »STATUS(RO)’ 
i pegs ATUS CODE 
’ 


DRIVE WENT OFFLINE 

OFLIN: GRROR BE inctor SORERENENT TOTAL ERROR COUNT 
INP —séOROP *DEASSIGN THE DRIVE 

PROGRAM TRIED TO GIVE THE DRIVE A BAD COMMAND 

BADOP: ERROR e. s INVALID COMMAND ATTEMPTED 
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;ORIVE IS UNSAFE 


oe Bye fhe 
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DRIVE TIMED OUT DURING A DATA TRANSFER 
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DROP ;DEASSIGN THE ORIVE 


;PROCESS ORDER COMPLETION WITH ’ERROR’ & "DONE’ BITS SET 


OP, SRPER(RO) 
. SRPER(RO) 1B TE Ely, OPERATION OVERFLOMED 


RF 
PF weno) A aa 


iPvER 1 THE WRITE PROTECTION VIOLATION 
OFV, SRPER(RO) 

Mle UNSAFE, 
#SUSI, SRPDS(RO) 


ie sare, 


NVALID DISK ADORESS ? 


Sars, SER 8 
BOROR te “he DISK ADDRESS 
wPROG! MODE, SRPERt 


jerreniee’ ERROR 
eT voee, esi {ANTERFACE CUNIBUS) ERROR ? 


+] ‘ 
WETE SRPER(RO) tFORRAT ifRon 3 


ErTERR £ Woe FORMAT ERROR 
,»SRPDS(RO) ; NOT F ? 
+6 ; NO 
Pe TWPE!CSME, SRPER( } i TRTERGOR ? 
: TR ERROR 
i : BUT NO BITS SET 
t 


;REPORT A WRITE CHECK ERROR (DATA CHECK BITS NOT SET) 


3e ;WRITE CHECK (DATA CHECK BITS NOT SET) 
pxe INCTOT ; INCREMENT *TOTAL’ ERROR COUNT 


;REPORT WRITE PROTECTION VIOLATION 


a in re, INCTOT 


;REPORT INVALID DISK ADDRESS (’NXC’, "NXT’, "NXS’) 
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TE THE EB 


COUNT 


tTNCRERENT PLOTAL: 
; RETURN 
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;REPORT CONTROLLER ERROR (*PROG’ & *MODE’) 


Bisi28 AB co7e1 _GNTRLR: GRROR BG, IncTor : 
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;REPORT UNIBUS INTERFACE ERROR (’TIMEE’ & 'NXME’) 


Oi 6 007616 wae in FZ, INCTOT ete COUNT 


;REPORT FORMAT ERROR 





* BEO 
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1S: (RO).-(SP) ; ON THE STACK 

RO). (SP) SPUT Pa AT STARTING Ae ane ooness 


#128. , (SP)+ SIU FILLED OW HX DISK STARTED ? 
(RO), sence Shams TRANSFER STARTED ? 
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aC 
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so 


pa 
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4 4g: afte! mask : MASK FOR RETRY 
#1U. + 4 T 
Pe, ih TOT : PETRY ALT oreys ERROR COUNT 
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3 4 f 6S: sFORMAT ERROR ING FOR INITIAL SECTOR 
a, 4 nitbaad 16 FRR . Be INCTOT 5 INCREMENT TOTAL’ ERROR COUNT 
14 1 001001 giss7e V ’ ; MASK FOR RETRY 
i 15571 gh 1: : 
1 O14 p BR 7s" GOOD RETRY 
Sa Anis ; ef 5 dacs 
4y 7$: yi 5 SFUL RETRY 
8S: RTS PC : 


;REPORT SEEK INCOMPLETE 


000207 

Glens? Go00i0 Oolise pov leah Garni Ton CYLINER 
007616 INCTOT ; pep ice OTAL’ canoe COUNT 

116046 
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a bo be a ee 


b16380 a PERE ee os 


' ;REPORT HEADER NOT FOUND ERROR OR POSITIONING ERROR 


00102 CKHNF: MOVE — SRPDA(RO),-(SP) ;SECT wou STACK 


sTiho),-(SPh iT 
R FROM THE INITIAL SECTOR 
7 ee phe Reoe ING OPERATION ? 
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° 
ice TEN ERT 
; TF ; 
etre *TOTAL’ ERROR COUNT 
: ] a 
;REPORT DATA ERROR (°LPE’, "WPE’, & *CSME’) 
. DATER: IT SWCE,SRPER(RO) ;WRI CK ERROR ALSO ? 


np CHECK WITH DATA CHECK 
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+ +4 
Py A o - 
DO 3 You all T ; 
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( 
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oouiy MOTH Fe ait ite iErage’ tee 

1S: ihe ES! 
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2s: ie. PC eercEN 


;ROUTINE TO DISPLAY THE aiid WHICH GAVE THE HARD ERROR 
163766 PRTBAD: & spare Ve BAD SECTOR ? 


sol bg SE eee & A WRITE CHECK ? 


—_ ry 


Bip nl 
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a ee 


R1, SRPBACRO) 
a 


15,3SaR 


Lon 
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\ ao 
1 SOE LEE PRE Bre coun 
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ROORESS ON THE STACK 
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BB AE nO FunisteD 


on : aiadaped wo se SECTOR ADORS ON THE STACK 
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, SRPER(RO) 
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STS eT eneD Den Tha eee a car et BINARY cornet TO 
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; 


ema 
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; RETURN ;ADDRESS OF IST CHARACTER IS ON THE STACK 
NER ion CES rhES ROUTING MHI 1S On HE” SvERtC Sue FEY CO LATER. 
015620 S§SB82D: oy Ht ee , path NARY NUMBER 


a oer 


Biee 
+ 
a 
” 
8 
Sewsvewoe 








Hea Ie i nore wees Gene cL 
ily SirteH DED BY THIS ROUTINE ARE: 

El aon : 

te N 5 ;ERROR=ENT AND NeERROR ITEM NUMBER 
GERROR: 


; FOR 
uve CHANGE IN SOFT-SUR 


R1,-(S8) 
tho Be 
ay * 


wesese we 
> 


ee we www 
e+?¢+4+¢04¢¢774 


1 
i 
ERROR 
CKSUR 
MOV 
: > 001266 fev 
106k : 





MD-11-D2RP1-B, RPLIE MULTI-DRI ISER PROGRAN MACYL1 27(732) Ol-NOV-76 15:32 PACE 64 
ozRPi8.ctS Be dy te 


bRING Be 
a he FINSTRUCTION 


es : ¢ u Hid ale, on ian 
Hes et fh bears 


elit nn tt 


a ee 
, ‘ 


LEPP rrr ards 
EEG) De 


Ss 
i" 


TER. 


i“ 


s#CALL: 
3#1) USING A TRAP INSTRUCTION 
Ht TYPE  ,MESAOR 3;MESADR IS FIRST ADORESS OF AN ASCIZ STRING 


ves TERMINAL ? 
f IF NO TERMINAL 


nae a 


IF <HT> 
3;BRANCH JF NOT <CRLF> 


ibe RS EB 
NSP ae” 


= 
wewe 
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THIS Se ces 


OR F 
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— 
THE NULL F OF STACK 


A COUNT 


ieee WITH SPACE 
F NOT AT 
S 
TAT RRETER oy 


7B FORE Tete 


1 el 
ein 


BINARY TO OCTAL (ASCII) AND TYPE 


THis ROUTINE Te USED To Chance @ ie-GIT GINWAT MAGER TO A ¢-O1 
ae BINARY NUMBER TO A 6-DIGIT 
10 SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


tee Port TO BE TYPED 


o1b2e4 JSR PC STYPEC 

il TLLC, (SP)+ 
001154 wrest 
000001 


at 


g 


on we ap dR 


3 
HOV NUM, -(SP) s sNUMBER TO BE TYPED 
TYPON te CALL FOR TYPEOUT 


SEDPOC==-GMTER WERE FOR THEOUT GF A 86 GET NRPGER 
# MOV NUM, -(SP) ;;NUMBER TO BE TYPED 
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3# TYPOC 3;CALL FOR TYPEOUT 

ite %; Boooor ouesiz SYOS! BBV Hf Spits TCH 
jes deevie donate HADUUST RETURN 

532° STYPOC: ee TCH 
‘ = i 
1 eu 

<i Be NUMBER OF DIGITS TO TYPE 
D1635 33 T IT FOR MAX. ALLOWED 
is aa sur 
beace 18: 2 ail 

Pa $3 

ude es: 3 DIGIT 

S414 38: - 
Hats 


RUBE 
e 
z= 
w 
= 


ae 





aera 
33) 


| 


— 


o Lav ah#* # 
pe i Sack FOR RETURNING 


ae 


Giese 
Bg tVs 


~ 
’ 


RSS Se: 


eo ae 


| aaah ap 
ee ery er er or crs 


Bite BHAT to re 


INARY TO any AND TYPE ROUTINE 


iis= 
' ain Ot] 


: ae SPER SSS aR AN SUR BSAAAURL IS aRASRS aaa NES E2 
3 
: 
seat 
iS 





: 


107 
PROGRAM MACY11 27(732) Ol-NOV-76 15:32 PAGE 6&7 
AND TYPE ROUTINE 


"CONVERT BInaRY Yo. DECIR 


é 


Sn is a 


NUM, -(SP) TO THE ROUTINE ON THE STACK 





Bese eee OE Sew 


: 
Pore SIGN 


(Of an 
Oe lees 


BE hes wis 


55 
SEEMS 


@sewe <3 @eerseeoee 
ag 
we 





os i 
é ue 
ee je 
: eae BRT LSD RST NON-ZERO? 
177777 177776 es; Sy ce TYPING 
nay eae 


a ey Rd RPIIE MULTI-DRIVE EXERCISER PROGRAM MACY11 27(732) Ol-NOV-76 15:32 PAGE 68 
OZRP18.CNB CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


nee -.= == 
. ig ; RETURN TO USER 


am. TTY INPUT ROUTINE 
$}HHINHNHHIHHIHHHHHHHHHHHIHHHHHHHHHHHHHE 


i a 


RENEE Tryeuize ve Ty xevooren Ine LE 





» _ JSR _—s- PC, STKINT 
el RETURN 


ércint: GR STKENT 4 FERREBR COUNT OF 
ne NOV STvaIn sth ‘cm ital INTO THe OUTPUT” POINTERS. 
ae ee 


Be ROUTINE Ml ILL SERV THE TTY KEYBOARD INTERRUPT 
; TCHARAC R FROM THe INPUT AND PUTTING 


i T 18 roe 10 The “cONTROL-C- RESTART ADDRESS. (QCHTRLCD 


en eae 


¢ 3 


Bierse SR STKINT «HIN 
oe Jf aes 





ND-11-DZRP1-8, RPLIE oho! EXERCISER PROGRAN 
DZRP1B. CNB TTY INPUT INE 


000176 


000001 
001206 


, 162012 
7? 162004 
7B 162000 





KO 
MACYLL 27(732) 


Ol-NOV-76 15:32 PAGE 89 


001140 CMP #SHREG, SWR 31S SOFT SELECTED? 
BEQ 6S 360 TO SWR CHANGE 
016746 ” CMP #1, STKCNT $318 THE y FULL? 
PPE al H net BELL 
TST {SP)4 Hod CHARACTER OFF OF STACK 
3S: ), #23 33 n A CONTROLS? 
33 TTY INTERRUPTS 
(SP)+ $3 ACK 
(Be he HOO gL ie Tre 
I Shia, isp) rea I I 
Be RSE? HRSA Golde , 
161758 Hoy 9100, aSTKS TTY KEYBOARD INTERRUPTS 
33 
: 33 ms 
fee a we NO By IF le 
(SP), ae ITA CHAR? 
Bet as OME IT ?: 
: Ov (SP5+ QIN 33 i in Siete 
= INC ~— HiPoare The I 
016755 es IKOIN, SSTKGEND 5; rr TH ? 
016750 SRT, STKOIN ; F THE POINTER 
9° 


001140 


001134 000001 


ticonTRoL 18 P ASSED 10 THIS INT FROM 
iz 
a a 


(SP) 33 
i; f 5 IT 
es 


EEE 


ITCH REGISTER TRAP 


GisTeR Canes SOFTWARE SWITCH REGISTER CHANGE ROUTINE, 
: - site tine 
ui a TTY I 
“SWR SELECTED 


s;EXIT IF NOT 
ie [tek WAITING? 
331F NOT, EXIT 


wh 7-BIT ASCII 


ee RecisTen 1 


HE Uibe-« ore stac 


Noy, Put IT IN THE TTY QUEUE 


re TY ern Puna cre en eine Q 


v 


M-11-DZRP1-B, RPIIE MULTI-DRIVE EXERCISER PROGRAM MACY11 27(732) Ol-NOV-76 15:32 PAGE 90 
OZRP 18. CNS TTY INPUT ROUTINE 


4585 BUSIE Bbeby TeRess UP SERENE EYER Er "he Bonito nT Enrurrs 
7322 112737 000001 001135 nove 3SET INTERRUPT 


4204 Ol #1, SINTAG MODE INDICATOR 
Bi73e0 iowol Geties ScTsur: TYPE | SHUR” tt TYBe CURRENT CONTENTS 
ian Fyeoc SHREG,~(SP) rR HyBErcScrar ASCTITALL DIGITS) 
r 020174 sont » SHINE Her FOR NEW SHR 
eS a a a A 
a! 100375 x BPL iy :3IF NOT TRY AGAIN 
Baro OMerie 177e00 Bic’ | sciv?,cap) «i mwxe: Yr Setr ascrz 
1 (SP), #3 33;1S ITA -C? 
isis Fok on “C (10) 


000001 


161514 
8$: 


Bd (and PHO Qee ps hee Ft ee 


CUUETemRME ENTERED hanes Basawaes SY RAC 


c 
Siac, $3 KEYBOARD INTERRUPTS? 


Sh 
g 


y 
s #88 : 
ESE RS RE 


(SP), #25 3318 17 f CONTROL-U? 3 
seimu i YES co it 
fee vous IN 


33LET’S TRY 


; 

BPPSSEEGE GERGZESBRY EGG eoAgSG 
g 
E 


1 
1 
01 1627 000015 10s (SP), 815 SIS ITA CCR? 
t Sule poo04 itt $FORANCH IF NO eIRST CHAR? 
i 1 03 il + BRBACH if sue 
118: : ji. 
ire Seeroe Soa Hf: Ne STECK, 
001135 000001 NTAG, #1 iRE-ENAGLE TTY KO INTERRUPTS? 
000100 161420 is #100, aSTKS “ENAGLE TTY KBD INTERRUPTS 
1 168: PC, STYPEC CHAR 
1 16s? ooded Sh) web Ghar < Of | 
i Ue 1 F YES 
De 000067 (SP), 867 > 7? 
i ey x 13 spe ; f rBe 
bo5766 000002 21S?) S THE FIRST CHAR 
1 ait) 
1 tt 


sie 

mat 
=e 
z 





a 
a 


SGSRSRS AGES SESSSGRORE GEIS GSRORSSESSSSSS SSSA RSCRENESG 


Fae SSN NS SANS 


Bs Pt b= Be Dee BO bee Bie es bes Beat fre bos 9+ ae Bon fo 


S55 
COOoOOOOCOOO0O0O000o0 


an ter Be 


wre 


SIS cues 


016754 016752 


020132 
n20144 


000177 


1 


LIE MULTI-DRIVE EXERCISER PROGRAM MACY11 27(732) Ol-NOV-76 15:32 PACE 





17S: INC 2(SP) ;;KEEP COUNT OF CHAR 
fr | ibe ot Hal N NEW CHAR 
18S: 33 9<CR><LF> 
Wein, BR 208 SIMULATE CONTROL-U 
¥E 
SATHIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 
*#  ROCHR GET A CHARACTER FROM 
3H RETURN HERE 
if CT at Tr OFF 
’ es 
SROCHR: (SP). -<SP) 
NOV Gisp) aise) eon PC AND 
CLR 4¢SP) es fen ie Sra A 8 CHARACTER 
MOV 864S,-(SP) PUT pe 
ax RTI ;;POP NEW PC AND sinc 
15: ep STKCNT ;;WAIT ON A CHPRACTER 
THE COUNTER 
MOVB QOUT,4(SP) 3; CHARACTER 
oe , #STKQEND’ Fae AT G0, OFF OF THE END? 
HOY santana ie POINTER 
© JHHBINHHEMHHHHHAHEGHHBHHHBE AHHH HHHEHIHHHEHBHHEHEHEHHHHEEHHEHHEHE 
jATHIS ROUTINE WILL INPUT A STRING FROM THE TTY 
*# =© | ©RDLIN 
+i HERE $ Mpnese Gr Inst CRECTER WILL WILL ee ON THE STACK 
+i TERMINATOR WILL BE A O’s 
SROLIN: MOV 
. os i GLE he RUBOUT KEY 
3: Bs af VR »R3 pee 
ONE CHARACTER FROM THE TTY 
MOVE  (SP)+, (R3) Her canna 
10S: iy #177, (R3) 4 Lene 
st if ) 1p THE FIRST RUBOUT? 
A 8’\,9S FS BACK SLASH 
MOV b-1, (SP) — THE RUBOUT KEY 
ied , SSTTYIN STACK EMPTY? 


@ 
So 
m 
a 


MO-11-DZRP1-B, RP1IE MULTI-DRIVE EXERCISER PROGRAM 
OZRP1B. CNB TTY INPUT ROUTINE 












ae 00130 APE 
Td ! SS: rs] 
a fi 000134 620130 MOVB 
020130 cin 

o0002S 7S: 
020151 er 

8S: 
1213 ee 
iss TYPE 
ooi2i2 4S: Type 
020130 a er 
000015 oe 

177777 
001214 ye 
HOV 
MOV e 
MOV 
RTI 
9S: " 


i qa DAPM Trl fu Purp rorurpru foro foror. FORD FOTO FLU B WRUFOTOTOT: ADT 
R. . + + +4 
- ash tat TUTE 


i 8 


NO 
MACYLL 27(732) 
(R3), 9S 
ie 
iv 
#°\,95 


aan 

—- 
o~ 
oe 


32 
=z 


an 


a 
~~ 
oo” 


Je32 
Zr 


s-° & 

— ++ 
i= 
nen 
— 


rte <1 
B33 > 


INTEGER DIVIDE ROUTINE 


one a 


irae 3 THE HIGH DIVIDEND MusT BE < 172 


LOW D 
Div 


Ol-NOV-76 15:32 PAGE 92 


TO TYPEOUT THE DELETED CHAR. 


iieR IF NO ae 
3 THAT OVER” 

$3 ACTER A “tR"? 
He THE CHARACTER 
: A “CR” & “LE 


ete 
HcLeRN aogguT KEY Y FROM THE STACK 
tiaDlust m3 STACK AND PUT 


HH T ASCII CHARAC ON IT 


# : ror ASCII CHAR. TO TYPE 
He 10, BYTES FOR TTY INPUT 
99 


__HROONTROL * “o" 


on “* 


cavie.ce POLE ATT OE Ee ISER PROGRAN MACYLI 808 Dl-NOV-76 15:32 PAGE 93 


PC, SOIV 
;;QUOTIENT & REMAINDER ARE ON THE STACK 


ne nether. 


DIVIDE SY ZERO 


at oe 


iP CONDITION CObes* 
me 
ION COUNTER 


THE OIVI 


iad 


8 
[md 
+ 


hast fe 
i BATE THE ORIGINAL 
3 sRICKUP THE VISOR 
4 id slot A NO-NO 
TO ALL ONES 
‘on TRACK OF DIVISORS SIGN 
ORIGINAL NUMBER 


F TI 
ones 


mths naar 


tT 
~ 


seaeen 


+3454 
“fs oatgatga gat 
, 


a 
s 
R ae 
(SP) 


000014 


STACK 

og 
me 
ad 7 
ae -(SP) 
(3) Rd 
Ne 7$ 








foo} Oe “8, ee Re kote PROGRAM MACY11 27(732) Ol-NOV-76 15:32 PAGE 3 


ITION CODES 


~~ +> 
haa 
a 
2= 
wes OE Owe ewe ww @ 


GARPRSRBBRBBEE § 


a8 : 


PPPETESGCe EES TEVEETEdTEetaetesterveyeaevarisseec est eet? 


SSAVREG THE STACK WILL LOOK LIKE: 


fie 


ast 


mi 


208 0S 0@ 0& 68 0@ 0M 04 Coco ee 


rire 


et Nat el Set 
Rmemeeen ttt t 


aeaecs 
. raat am tan and 





_BBEBEBEBERE : G eesaass 


veirty? 
ee ph pt, 












eS 2 ated aS fy BA Sa PERCTSER Progra MACY ee O1-NOV-76 15:32 PAGE 95 
A eS 
.SBTTL RANDOM NUMBER GENERATOR ROUTINE 
een ee ee 
ial: Ish, PC. SRAD $C THE ROUTINE 


tMUMGER WILL BE IN 
+ SHINUM, SL 


Ay Ay J 
buwe 


A 
. 


E 
e 
3 
fod 
A 


~SBTTL DOUBLE LENGTH BINARY TO DECIMAL ASCII CONVERT ROUTINE 


7 GHAR SAH HEEB EBB BS HHE HE AHHEEE 
3ATHIS ROUTINE WILL CONVERT A 32-BIT BINARY NUMBER TO AN UNSIGNED 
i {re eld) NUMBER. THE SIGN OF THE BINARY NUNGER MUST GE 

, ° 


3;POINTER TO LOW WORD OF BINARY NUMBER 
s: THE FIRST OF ASCIZ 
3315 ON THE Stan 


3;SAVE REGISTERS 


a eS RP} tench Shea fo Becin focr ra She Ol-NOV-76 15:32 PAGE % 


it AOE © BAF AD src 


va ae 
wots 
IF TEN POUR TO LARGE 


ORE SUBTRACTED VALLE 


en 10 Reet 


ae asses 


541.0608 
331.0607 
3;4.0E06 
331.005 
331.0E04 
3;1.0€03 
;;1.0E02 
331.0€01 
7s 351.0€00 
SDECVL: .BLKB 12. ;;RESERVE STORAGE FOR ASCIZ STRING 
-SBTTL TRAP DECODER 


ele a ae aid Ba Pe 
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fontiaae. © TAAS DeROoER 
1020 01 STRAP: MOV RO, -(SP) 
ey 2($P) RO 
(RO) , RO 


c084 Ry habe 


3;THIS IS USE TO HANDLE THE “GETPRI” MACRO 


1 1 STRAP2: (SP). =(SP) rr 
ip Bree 000004 o000d2 4(SP), 2°SP) 33 The Pos ba 
1 I 33 ORE 


-SBTTL TRAP TABLE 


Say te the IN is on STARTING ES OF THE ROUTINES CALLED 


i 


; ROUTINE 
i mee WR, TRG, Wasigeg Ty . , 
ie Hest pea tas fue Peay 
» = Hh, 
iGictetypos © TRAPSSC LDMOS) IMAL MUPBER CWI 
021070 017334 SCTSUR ;;CALL=GTSIR ates ti: GET SOFT-SWR SETTING 


ae ne Rela 


STORE yO ED, IER Ce 
ite G0000 EMS: i 
om PASE Ee Be LTR Mtn, 


} 021110 00000 DRVACT: 
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; TABLE y : ar (DRVSTA=8 BYTES) 
paver OR OFFLINE 
Bavetac OR AN RPOS 


i 


NDICATOR (DRVTYP = 


; DRIVE - 
sc ey. 2 EES PE LET 1 
SA ORE MORO GAELE. 1 IT WILL CONTAIN THE ADORESS OF 


SEEK WALT KEYS (SEEKNT21 


THAT Uy AIN A ro ne’t 4 
Re Eee T BITOO FOR DRIVE 0. 


ath io ll 
“we hee 


ACTSTR: . 


= Bites: 


R a R 
be oo os 

ee es 
mR 2? BR 


& 
@ 


8 
ro4 
cs 
8 


: 
: 
: 





sl whi ae pee EXERCISER PROGRAM MACY11 G8 Ol-NOV-76 15:32 PAGE 99 


;ORDER REQUEST QUEUES/LISTS 
-WORD 0,0,0,0,0,0,0,0,0 ;STORE REGISTERS ORDER QUEUE 


QSEEK: .WORD 0,0,0,0,0,0,0,0,0 ;SEEK/HOME SEEK ORDER QUEUE 
0,0,0,0,0,0,0,0,0 ; TRANSFER ORDER QUEUE 
QDONE: .WORD 0,0,0,0,0,0,0,0,0 ;ON CYLINDER TRANSFER QUEUE 


ssscsseessssay 8 


QWAIT: .WORD 0,0,0,0,0,0,0,0 § ; TRANSFER SEEK DONE LIST 


STIMEOUT THIS TELE CONTAINS THE TINE ALLOWED FOR AN OPERATION 


TIMER: 0 


;ATTENT (ATABIT=8 
m4 pee eoamen BIT TO EACH DRIVES 


i 


ne rari 


ey 


sRPLIE tHe 


SSSS5A555555539555595 
- ot 


021314 104412 





8 


a 
a 


1-8, wh MULTI-DRIVE EXERCISER PROGRAM MACY11 27(732) Ol-NOV-76 15:32 PAGE 100 
ie” i 


fs NO 
THE RP11 VECTOR 


¢ xt .at. 0? 0? vt 1¢, 09.979, 19,7 
BHO Be an ft Bree ee Bee Jaws bt nt ms no Pee be ho pew 
Fs 4 = 
‘ 


seahetiSKSS 


4,14, 44,1 
ao hae fe ee on Gane Dos Hat paw owe Be 


TLS 
;ORIVE TO Ri 


— OF RP11 (RPDS) 


“a 


i — OR NONEXISTENT 


= 
: 


E553 


ry 
te are 
grrerre ni ), Rede INorcATOR 


1*,3 sf,1*, vt 1f,3 
Gee fee Dee Bee Bee Bat fee Pet Bat Pee Pee Geet Gs fet Gs Ft fe ee 





MD-11-D2ZRP 1-8, -_e MULTI-DRIVE EXERCISER PROGRAM MACYI1 27(732) Ol-NOV-76 15:32 PAGE 101 
OZRP18. CNB 1 HANDLER 


4818 EAB Ge ie O21305 1122 ag: fetes pert: bart if NDICATOR 


rai fi yc soni REQUEST 
$CALL 
3 


Hen ap of POENTER Be DRIVE’S PARAMETER BLOCK 


ila he OTe 


Abeer NTERRUPTS 


TaIVe/ERROR IND BLOCK POINTER 


ee SF pe ATOR 


BS ORIVER™ FLAG 


nt Ore bas bas = me em hme me fe 

Rais oe oo ie 
s+ = PY 
7 rt Sad food Sond fae 

~~ De 

oy 
—_ 
eon 


FronG 


oOo rr 
= 


_ 
++ 


1S: 


tn 
8 
— 
+ 
¢ 8 


ERaRIEEEE 


~ 
3 & 
ej 
= 
a 


sCOMMAND INITIA 
CI: 


= 
“5 
e 


RR 8 Re 
a 5 
a 


reer 


cr 
aa 


al atatmtateta tal atatata tate 
J ' i i t 
= 7 
Ros Sk icin 
eB 
Sa a 


;STORE THE REGISTERS COMMAND 





ND-11-D2RP1-8, “on MULTI-DRIVE EXERCISER PROGRAM 
1 HANOLER 


OZRP 1B. CNB 
re ITED rey zr? nNOS 
BS tao 000016 


il 





ise teliss 


Aeeile 


fs = 
at? 1 


Gelise dele 


1110 


oo0014 
000014 

0 
021126 


021264 
i O2le44 


12 


KO8 
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cli: hove genes, APCS+1 (RH) ppb SEREST IME DRIVE 
ry setter, - ia /REGISTERS 
et Ok bene” MORE RERIEETS IN QUEUE ? 
Rm ia 


;START THE SEEK OR HOME SEEK COMMAND 


Cle: my Pama 
a 


CT THE DRIVE 


Py , ; IS READY 
e is sa ae 
it a itr}, prvact IVE'S ACTIVE BIT 
ROY OO TRIUAN Aat RET queue 
1S: fo by 
ie oat MORE. RE —— 
Ris Be ie riRN 


;D0 AN EXPLICIT SEEK IF DRIVE IS NOT ON CYLINDER 





C13: nove 
MOVB 
MOV 
BR 
MOV 
MOV 
Bee if t IVE ACTIVE 
a ATAGIT(RI) | SEEKNT TREX WAIT BIT 
thos wean eat 
1S: a R} a a 
v 
BNE He Bere ONES ; 


;START THE PENDING ON CYLINDER TRANSFER REQUEST 


000016 
000016 





000001 021130 


ait 
O225S2 


beiete 


021130 


qanssasseassssseaaananmiaanssagmassiinssiisanaass | 
AAA PN Poppe SRNR: a 








LOS ws 
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SELECT THE DRIVE 
ss A 


MOVB »RPCS+1(RH) 
MOVB aac i 
ee RRS fe READ 
»CIR ; 1S READY 
BR 1$ sDRIVE NOT READY 
MOV 4(R2),RPWC(RY) $ 
MOV 6(Re) (RY): 
MOV a (RY) 3 i: 
MOV i (RE), RPDACRY) ; 
MOV (Re), (SP) ifs HOR BITS 
He img) i 
1(ReS, (SP) ; 
i te yt ) mere ON DONE BIT 
SB. OAK pit CR). Bact DRI IVE BIT 
ASL R WORDS , 
HOY I MOUT, TIMER(RL)* r FOR DRIVE 
MOV TRNGWT : 
: RUNNING ? 
BNE BR IF s 
; WAITING ? 
BNE - 4 : F 
2s: RTS PC ; RETURN 
;SEE IF DRIVE IS ONLINE 
“atte tote rR ae sre WHAT DRIVE? S TATUS ig 
pet : es F DRIVE Rie 
FOV ITIS!BIT14, 16¢ NDICATOR 
: ITIS!BIT12, 16( ICATOR 
i BPE a ee S 
3S: TST (RO)+ iS AROUND ERROR RETURN 
4g: RTS RO : 


; INTERRUPT SERVICE ROUTINE 


sSET “ACTIVE DRIVER” FLAG 


spin IN PROGRESS ? 
CALL TROSFER 


RAND. INITIATION ROUTINE 
DRIVER” FLAG 


ND-11-DZRP1-8, ree MULTI-DRIVE EXERCISER PROGRAM MACY11 27(732) Ol-NOV-76 15:32 PAGE i04 


s TRANSFER DONE ROUTINE | 
TD: STORAGE 
sbtg Bt RNSUT RI Pain te 
ATABIT(R1), orvact ;CLEAR DRIVE ACTIVE BIT 
#1, TIMER(RL) ;STOP TIMER 


WAIT GUEUE™-CLEAR QUEUE 


- 


=aTul 







a 
Bf 
nove RIL on Br THE DRIVE 
nove TTCRL) Rost Be DRIVE’S ATTENTION BIT 
fot cAVEFG RPL1E REGISTERS? 
1S: ioe Pe Svar, ieee OTR BORE? BIT 
. iar cea i 34 TO BE PUT IN QUEUE 
eT Eeie ies Satbat ie 
Bae cae 
Ov Be 16¢F ; OR OFFLINE INDICATOR 
3S: FOV Striseere, 1e¢h oR _ NOICATOR 
. BR feck FOR 0 
4B: BIS SeITIS!BITOS, roche) Set bala Dat ERROR FLAG 
FORCED WRITE CHECK ROUTINE 
WC: Ist AUTOCK s AUTOMATIC WRITE CHECKS ? 
fre” rTo2, scomocre} sHRITE COMMAND ? 
MOV satRANS RI ; A ADDRESS 
a RO, DRVOUE seu ce IN THE QUEUE 
Hoy Bormcne), senevh wale! OPERATION CODE 
. Bp Say a te RL pen ane 
; RTS = PC” sRES TORE 


;SPECIAL CONDITION ROUTINE 
SC: TSTB RPOS(RY) ;ATTENTION BITS SET ? 








NOS. 
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Resin), *RPERRe+! Stoke Barve STATUS eae 


fect MEE 


1S AN 
,RPCS#1( i 
#40, RPCS 1(R4) Sey gale 


ictal Req IAA TT-DRIVE/ EXERCISER PROGRAM = MACY 7893 O1-NOV-76 15:32 PAGE 106 


ica uiy 


4p At 4 


' 
t 


8 
a TO CHECK 


Ay Ag ay ay dg ay ay ag ay 
RnR RAY 

> > 

veovt et tt yt yt atte 
ete te teat hee heehee 


MIM MOOOOOS 


POON OOOO OG 
» .4 erururururururu©ry 


ues are tonn, 
$3 ox RPDSCRHD Pe 


weer ott 
RTAGIT(RL), SEEKMT : 


ITAS¢BITIN, 16¢RE) fF 


Bs? sBEPRLUPARLARES MST 


ACTORV ;CHECK “ACTDRV & ACTSTR™ 


4 ga & 





+ run +4 


at, 


Pao fee pan pas 


? =? 4 


& 


SEAESA 


fas Ss ba8 fee Bs Ge bs fen Fa 








By 000001 21131 


021264 18: 
021264 
O2e3472 
2s: 
000010 a 
021124 38: 
Bien 
021131 im, 
S$: 


aT whi a EXERCISER PROGRAM MACYLI ng? 


_ i 


HH encra 
(SP), ae 


= 


SOFTWARE TIMEOUT ROUTINE 


3 
; 
CALL: | $70 
: ewe 
; TP oe 
is STO: By 
Be: RL, ReCS+1 CRM) 
“z- 
be 021264 $1, TIMER(R1) 
ox 
a 
vo 
3 
es 
ce: 021110 
000016 


TT14, 16(R2) 


‘Bain 


01-NOV-76 


on 
WITH DRIVE 0 






15:32 PAGE 107 


THE ye RUNNING? 
IF NO 


TTUREDUT ROUTINE 


"0 reXT DRIVE 


esata 


TIMEOUT ROUTINE FLAG 





One i cli EXERCISER PROGRAM «EYL 7003 Ol-NOV-76 15:32 PAGE 108 
















«Teg ;CLEAR THE TRANSFER QUEUE 
1 WORDS 
QUATT(RL) ,R2 $6 Pee AOORESS 
»RPOS(RY) $C ° 
I,RPOS(RY) [SE ? 
»RPDS(RY) 508 INE ? 
3 ’ 


CATOR 


»RPDS(RY) $6 IVE Ae: 
— 16(R2) NOICATOR FOR TIMEOUT DURING SEEK 
tel ce 


ITCR1) 


sy asta s SeTIVE a 







ata ’ 
++ Nae 





A 


TpRtRen 


Pp pr yn pp tt yy ‘ iy 
mts? ep > 


or oe oe Oe Oe 
1. 9t.% 
“iy a, 
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OZRP1B.CHE 
; By ger is 5 ama 
tans Bi agiT0, etre) ie GET REGISTER REQUEST ? 
p0000e H ae rp : eM 
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